﻿'<Get Linux is a open source lightweight download client for operating systems.>
'    Copyright (C) <2014>  <Dev-fire>

'    This program is free software: you can redistribute it and/or modify
'    it under the terms of the GNU General Public License as published by
'    the Free Software Foundation, either version 3 of the License, or
'    (at your option) any later version.

'    This program is distributed in the hope that it will be useful,
'    but WITHOUT ANY WARRANTY; without even the implied warranty of
'    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
'    GNU General Public License for more details.

'    You should have received a copy of the GNU General Public License
'    along with this program.  If not, see <http://www.gnu.org/licenses/>.
Public Class Splash
    Public Loading As String
    'OnStartup
    Private Sub Splash_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Label_Version.Text = "Version: " & My.Application.Info.Version.ToString
        Label_Copyright.Text = My.Application.Info.Copyright
        Label_Made_By.Text = My.Application.Info.CompanyName
    End Sub
    'AccessControl
    Public Sub Loading_AccessControl()
        If Me.InvokeRequired Then
            Me.Invoke(New MethodInvoker(AddressOf Loading_AccessControl))
        Else
            Label_Loading.Text = Loading
        End If
    End Sub
End Class